package lintulaskenta.servlet.havainnointi;

import java.io.IOException;
import java.net.URISyntaxException;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.TreeMap;
import java.util.logging.Level;
import java.util.logging.Logger;
import javax.servlet.RequestDispatcher;
import javax.servlet.ServletException;
import javax.servlet.http.Cookie;
import javax.servlet.http.HttpServlet;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import javax.servlet.http.HttpSession;
import lintulaskenta.entity.Havainnointitapahtuma;
import lintulaskenta.entity.Havaintopiste;
import lintulaskenta.entity.Pistevuosi;
import lintulaskenta.entity.Reitti;
import lintulaskenta.rekisteri.ReittiRekisteri;
import lintulaskenta.rekisteri.Rekisteri;
import lintulaskenta.utils.Item;
import lintulaskenta.pulautin.SyotteenTarkastaja;
import lintulaskenta.utils.TipuApiForInterface;

public class TapahtumanHakuServlet extends HttpServlet {

    private HttpSession session;
    private Havainnointitapahtuma ht = null;
    private Reitti reitti = null;
    private TreeMap<Integer, Pistevuosi> pisteet = new TreeMap<Integer, Pistevuosi>();
    private String url;
    private Rekisteri rekisteri = new Rekisteri();
    private ReittiRekisteri rRekisteri = new ReittiRekisteri();
    private SyotteenTarkastaja st = new SyotteenTarkastaja();

    protected void processRequest(HttpServletRequest request, HttpServletResponse response)
            throws ServletException, IOException, URISyntaxException, Exception {

        response.setContentType("text/html;charset=UTF-8");
        request.setCharacterEncoding("UTF-8");

        poistaCookiet(request.getCookies(), response);
        session = request.getSession();

        // Parametrillä reitinnumero etsitään reitti, jolle halutaan luoda uusi havainnointitapahtuma.
        // Parametrillä id etsitään kyseistä pääavainta vastaava havainnointitapahtuma, jota halutaan muokata.
        if (request.getParameter("reitinnumero") != null && st.isANumber(request.getParameter("reitinnumero"))) {
            alustaUusiHavainnointitapahtuma(Integer.parseInt(request.getParameter("reitinnumero")));
        } else if (request.getParameter("id") != null) {
            alustaHavainnointitapahtumanMuutos(Integer.parseInt(request.getParameter("id")));
        }

        // Jos reittiä ei löydy, käyttäjälle näytetään virheilmoitus. Muuten jatketaan lomakkeen alustamiseen.
        if (reitti == null) {
            url = "havainnointitapahtuma.jsp";
            request.setAttribute("virhe", "Reittiä ei löydy!");
        }
        if (request.getParameter("reitinnumero") != null && !st.isANumber(request.getParameter("reitinnumero"))) {
            url = "havainnointitapahtuma.jsp";
            request.setAttribute("virhe", "Virheellinen reittinumero!");
        }
        else {
            // Haetaan kunnat ja havainnoijat TIPUAPI:sta.
            TipuApiForInterface client = new TipuApiForInterface();
            ArrayList<Item> kunnat = (ArrayList<Item>) session.getAttribute("kunnat");
            if (kunnat == null) {
                kunnat = client.getKunnat();
                session.setAttribute("kunnat", kunnat);
            }
            ArrayList<Item> ringers = (ArrayList<Item>) session.getAttribute("ringers");
            if (ringers == null) {
                ringers = (ArrayList<Item>) client.getRingers();
                session.setAttribute("ringers", ringers);
            }

            // Asetetaan haetut tiedot istuntoon.
            session.setAttribute("tapahtuma", ht);
            session.setAttribute("reitti", reitti);
            session.setAttribute("pisteet", pisteet);
        }

        // Yleisen tilan tiedot
        TreeMap<String, Object> yleinenTila = new TreeMap<String, Object>();
        yleinenTila.put("url", url);
        yleinenTila.put("tila", true);
        session.setAttribute("yleinenTila", yleinenTila);

        RequestDispatcher dispatcher = request.getRequestDispatcher(url);
        dispatcher.forward(request, response);
    }

    private void alustaUusiHavainnointitapahtuma(int reitinnumero) throws Exception {
        url = "havainnointitapahtuma.jsp";
        // Haetaan reitti tietokannasta.
        Map<String, Object> rEhdot = new HashMap<String, Object>();
        rEhdot.put("vanhaReittiNumero", reitinnumero);
        List<Reitti> reitit = rRekisteri.haeReititEhdoilla(rEhdot);
        reitti = null;
        if (reitit.size() > 0) {
            reitti = reitit.get(0);
            // Haetaan viimeisin reitin havainnointitapahtuma, jonka tiedot kopioidaan alustavasti uuteen havainnointitapahtumaan.
            List<Havainnointitapahtuma> tapahtumat = (List<Havainnointitapahtuma>) rekisteri.getResultList("select u from Havainnointitapahtuma u where u.vuosi = (select max(p.vuosi) from Havainnointitapahtuma p where p.reitti.reitinNumero = " + reitti.getReitinNumero() + ")", Havainnointitapahtuma.class);
            if (tapahtumat == null || !tapahtumat.isEmpty()) {
                kopioiHavainnointitapahtuma(tapahtumat.get(0));
            } else {
                luoUusiHavainnointitapahtuma();
            }
        }
    }

    private void alustaHavainnointitapahtumanMuutos(int id) {
        url = "muutos.jsp";
        ht = (Havainnointitapahtuma) rekisteri.getEntity(Havainnointitapahtuma.class, id);
        reitti = ht.getReitti();
        List<Pistevuosi> pistevuodet = ht.getPistevuodet();
        pisteet = new TreeMap<Integer, Pistevuosi>();
        if (!pistevuodet.isEmpty()) {
            for (Pistevuosi p : pistevuodet) {
                pisteet.put(p.getPisteenJarjestysnumero(), p);
            }
        }
    }

    private void poistaCookiet(Cookie[] cookies, HttpServletResponse response) {
        for (int i = 0; i < cookies.length; i++) {
            if (!cookies[i].getName().equalsIgnoreCase("JSESSIONID")) {
                cookies[i].setMaxAge(0);
                response.addCookie(cookies[i]);
            }
        }
    }

    private void luoUusiHavainnointitapahtuma() {
        ht = new Havainnointitapahtuma();
        ht.setLaskentakunta("");
        ht.setLahempiPaikka("");
        ht.setHavainnoijaNumero(0);
        luoUudetPistevuodet();
    }

    private void kopioiHavainnointitapahtuma(Havainnointitapahtuma ht2) {
        ht = new Havainnointitapahtuma();
        ht.setLaskentakunta(ht2.getLaskentakunta());
        ht.setLahempiPaikka(ht2.getLahempiPaikka());
        ht.setHavainnoijaNumero(ht2.getHavainnoijaNumero());
        List<Pistevuosi> pistevuodet = ht2.getPistevuodet();
        kopioiPistevuodet(pistevuodet);
    }

    private void luoUudetPistevuodet() {
        int pisteidenMaara = reitti.getPisteidenLkm();
        for (int i = 1; i <= pisteidenMaara; i++) {
            Pistevuosi pistevuosi = new Pistevuosi();
            pistevuosi.setReitinNumero((int) reitti.getReitinNumero());
            pistevuosi.setPisteenJarjestysnumero(i);
            pistevuosi.setReitinSade(50);
            pistevuosi.setHavainnointitapahtuma(ht);
            Havaintopiste hp = new Havaintopiste();
            hp.addReitti(reitti);
            pistevuosi.setHavaintopiste(hp);
            Havaintopiste h = new Havaintopiste();
            h.addReitti(reitti);
            pistevuosi.setHavaintopiste(h);
            ht.addPistevuosi(pistevuosi);
            pisteet.put(i, pistevuosi);
        }
    }

    private void kopioiPistevuodet(List<Pistevuosi> pistevuodet) {
        for (Pistevuosi p : pistevuodet) {
            Pistevuosi pistevuosi = new Pistevuosi();
            pistevuosi.setBiotooppikoodiEnnen(p.getBiotooppikoodiEnnen());
            pistevuosi.setBiotooppikoodiNyt(p.getBiotooppikoodiNyt());
            pistevuosi.setHavaintopiste(p.getHavaintopiste());
            pistevuosi.setReitinSade(p.getReitinSade());
            pistevuosi.setReitinNumero(p.getReitinNumero());
            pistevuosi.setPisteenJarjestysnumero(p.getPisteenJarjestysnumero());
            pistevuosi.setHavainnointitapahtuma(ht);
            ht.addPistevuosi(pistevuosi);
            pisteet.put(pistevuosi.getPisteenJarjestysnumero(), pistevuosi);
        }
    }

    // <editor-fold defaultstate="collapsed" desc="HttpServlet methods. Click on the + sign on the left to edit the code.">
    /** 
     * Handles the HTTP <code>GET</code> method.
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException if a servlet-specific error occurs
     * @throws IOException if an I/O error occurs
     */
    @Override
    protected void doGet(HttpServletRequest request, HttpServletResponse response)
            throws ServletException, IOException {
        try {
            processRequest(request, response);
        } catch (URISyntaxException ex) {
            Logger.getLogger(TapahtumanHakuServlet.class.getName()).log(Level.SEVERE, null, ex);
        } catch (Exception ex) {
            Logger.getLogger(TapahtumanHakuServlet.class.getName()).log(Level.SEVERE, null, ex);
        }
    }

    /** 
     * Handles the HTTP <code>POST</code> method.
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException if a servlet-specific error occurs
     * @throws IOException if an I/O error occurs
     */
    @Override
    protected void doPost(HttpServletRequest request, HttpServletResponse response)
            throws ServletException, IOException {
        try {
            processRequest(request, response);
        } catch (URISyntaxException ex) {
            Logger.getLogger(TapahtumanHakuServlet.class.getName()).log(Level.SEVERE, null, ex);
        } catch (Exception ex) {
            Logger.getLogger(TapahtumanHakuServlet.class.getName()).log(Level.SEVERE, null, ex);
        }
    }

    /** 
     * Returns a short description of the servlet.
     * @return a String containing servlet description
     */
    @Override
    public String getServletInfo() {
        return "Short description";
    }// </editor-fold>
}
